home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr02 / bulkst10.zip / MAILSORT.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1993-06-15  |  13KB  |  147 lines
  1. [1] Run mail sort program
  2. [2] Change postal rates
  3. [3] Instructions and setup
  4. [4] Exit
  5. Enter choice:  
  6. mailsyst
  7. Enter 3/5 presort rate:  
  8. 9.999
  9. Enter basic rate:        
  10. 9.999
  11. Hit "x" to exit, any other key to run mailsort
  12. Mailsort will sort your mailing list by five-digit ZIP Code in proper order 
  13. for third class (bulk) mailing.
  14. This program is current with the postal regulations as of June 14, 1993.
  15. Please send $20 to:
  16.                      Vinitsky Consulting
  17.                      c/o Y.M.T.
  18.                      2728 West Pratt
  19.                      Chicago, Illinois  60645
  20. to be notified of upgrades.
  21. Hit any key for next screen.
  22. Mailsort needs to be setup.  When you run the setup, you will be asked 
  23. for the following:  1) the name of your mailing list, 2) the name of a 
  24. long field in your record, 3) the current 3/5 presort rate, and
  25. 4) the current basic rate.
  26. When the postage rates change, it is not necessary to run the entire setup.  
  27. A menu option allows you to change just the postage.
  28. IMPORTANT: The zip code field in the database must be called ZIP_CODE.
  29. The sort routine will add a field called ORDER to your database, make
  30. sure there is not a field by that name already.  Also, no zip code
  31. fields can be blank. (This limitation will be addressed in future
  32. versions.)
  33. Hit "X" to exit, any other key to run set-up.
  34. Please enter the following information:
  35. Mailing list name:  
  36. EXAMPLE:  FILENAME or FILENAME.EXT if on this directory,
  37. \DIRECTORY\FILENAME or \DIRECTORY\FIELNAME.EXT if on a
  38. different directory.
  39. Long field in record:  
  40. Enter 3/5 presort rate:  
  41. 9.999
  42. Enter basic rate:        
  43. 9.999
  44. use &mlist
  45. mailext
  46. mailext
  47. order
  48. mailing
  49. mailext
  50. Enter maximum number of pieces per sack:  
  51. minimum is 125.
  52. Please be patient . . .
  53. zipsum
  54. mailing
  55. mailzip
  56. appe from &mlist
  57. MAIL SUMMARY REPORT
  58. STATE
  59. COUNT
  60. # OF SACKS
  61. ZIP CODE
  62. STATE
  63. COUNT
  64. # OF SACKS
  65. 00001
  66. 99999-9999
  67. replace &mfield with 'Use ' + str(mnum,2) + ' sack(s)'    
  68. replace &mfield with 'Use "D" tag'
  69. find &mzip
  70. replace &mfield with 'Use ' + str(mnum,2) + ' sack(s)'    
  71. replace &mfield with 'Use "D" tag'
  72. find &mzip5
  73. replace &mfield with 'Use "D" tag'
  74. find &mzip5
  75. replace &mfield with 'Use "3" tag'
  76. find &mzip5
  77. find &mzip5
  78. replace &mfield with 'BEGIN STATE SACK HERE'
  79. replace &mfield with 'Use ' + str(mnum,2) + ' sack(s)'
  80. replace &mfield with 'BEGIN STATE SACK HERE'
  81. replace &mfield with 'Use ' + str(mnum,2) + ' sack(s)'
  82. replace &mfield with 'Use "D" tag'
  83. find &mzip
  84. replace &mfield with 'Use "D" tag'
  85. find &mzip
  86. replace &mfield with 'Use "3" tag'
  87. find &mzip5
  88. find &mzip5
  89. replace &mfield with 'Use "S" tag'
  90. find &mzip
  91. replace &mfield with 'BEGIN MIXED STATES SACK HERE'
  92. replace &mfield with 'Use ' + str(mnum,2) + ' sack(s)'
  93. Mixed States
  94. replace &mfield with 'Use "D" tag'
  95. find &mzip
  96. replace &mfield with 'Use "D" tag'
  97. find &mzip
  98. replace &mfield with 'Use "3" tag'
  99. find &mzip5
  100. find &mzip5
  101. replace &mfield with 'Use "S" tag'
  102. find &mzip
  103. find &mzip
  104. replace &mfield with 'Use "MS" tag'
  105. find &mzip
  106. COUNT
  107. POSTAGE
  108. TOTAL
  109. 3/5 presort rate:  
  110. #,###,###.##
  111. Basic rate:  
  112. #,###,###.##
  113. TOTAL
  114. #,###,###.##
  115. Total sacks in mailing:  F
  116. sort to &mlist on order
  117. MCHOICE
  118. MAILSYST
  119. MFIVE
  120. MBASIC
  121. BASIC
  122. MFIELD
  123. FIELD
  124. MLIST
  125. SMAILEXT
  126. FIELD_NAMEFIELD_TYPEFIELD_LEN
  127. FIELD_DEC
  128. MAILING
  129. NOSACK
  130. ACOUNT
  131. BCOUNT
  132. ZIPSUM
  133. MAILZIP
  134. ZIP_CODE
  135. STATE
  136. MCOUNT
  137. COUNT
  138. MTEST1
  139. MTEST2
  140. ORDER
  141. WHILE
  142. MZIP5
  143. XCOUNT
  144. D:\FOXPRO25\BULKSORT\
  145. MAILSORT.FXP
  146. D:\FOXPRO25\BULKSORT\MAILSORT.PRG
  147.